#'###########################################
#'                                          #
#'  ------------------------------------    #
#'  |     COIN     __                  |    #
#'  |            >(' )                 |    #
#'  |              )/                  |    #
#'  |             /  `----/            |    #
#'  |             \  ~=- /             |    #
#'  |   ~^~^~^~^~^~^~^~^~^~^~^~^~^~^   |    #
#'  ------------------------------------    #
#'                                          #
#'###########################################


source(file.path(R_WORKING_DIRECTORY, "Utils/loadDependencies.R"))

ARGOS_CLUSTER_CORES <- detectCores()

if (!exists("ARGOS_CLUSTER")) {
	ARGOS_CLUSTER <- makeCluster(getOption("cl.cores", ARGOS_CLUSTER_CORES))
	setDefaultCluster(ARGOS_CLUSTER)
} 
clusterEvalQ(ARGOS_CLUSTER, source("C:/UQAR/Recherche/Maitrise/Donnees/R/Utils/loadDependencies.R"))



